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hobBIl ....? 
„„..hobBIl !? 


șz) ată prieteni câ am: ajuns si la nunârul doi 
A ca) dintai (Rabi 





in %%3 Li mai sceptici se indoiau pină şi de 
1 Egzaptimul. numar. tar... dacă vrei noi. 

Sea e Mulţumim tuturor celor ce ne-au scris, mai 
CU i laude, mai cu sfaturi critice, clar toate aceste 
scrisori au exprimat un lucru Clar: este nevoie de o 
revistă cu asemenea contmut. 

Vă rugăm ca și în continuare să vă exprimaț 
părerile in legătură cu revista noastră pentru că 
numai așa vom apnge să o ecitam corect și la 
obiect. Asigurăm pe toți cei ce ne trimit scrisori, că 
ele sint citite CHIAR N ZIUA sosirii lor la redacție. Vrem 
ca tot timpul să avem un dialog cu vai ca în fiecare 
nou numâr să regâsiți ceva cm ideile pe care ni le 
sugerați 

Pentru aceasta, vă rugâm să ne trimiteţi tot ce 
credeți câ poate folosi altor posesori de calcu- 
latoare: listnguri, jocuri comentate, Tips&Tricks-uri, 
mici traduceri, scheme, poze, caricaturi anunțuri. 

INCEPIND DIN NUMARUL VETOR, LISTINGUL 
PUBLICAT SE PREMIAZĂ CU SUMA DE 3000 LEI 

Vom premia un singur listing prumit ce la Cititori 
lunar, indiferent de tipul de calculator sau destmaţie 
(utiitar sau joc). Programul trebue scris pe o coală 
format 44, de mină, cit mai citet, sau preferabi la 
mașină, specificindu-se pentru ce tip de calculator 
este, ce vrea să facă, precum și numele, virsta, 
domiciiul si ocupaţia autorului. Listinqul NU trebue să 
depașească 2 pagini, 

Premiul este LUNAR 

Toate participările la redactare, precum și scrisori 
le voastre vă rugâm să le trimiteţi pe adesa: 

REVISTA hobBiT - CP.37/131 - București 


ŞI-:a 


| "207 | “REDUCERE 


„Contactaţi-ne la redacție pentru a vă 
putea procura revista cu reducere de 
pret. Oterta se adresează tuturor gru- 
purilo: de elevi, studenți sau membru 
intr-un ere de mformatica. 
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.a Timisoara s-a inființat o filială a Clubului 

Are, pină la ora cind sint scrise aceste rinduri, 
peste 55 de membri. Iipuri de calculatoare: 
Spectrun și Commodore. 

Posesori de calculatoare dn vestul tări pot lua 
legatură cu CRC-Timișoara, pentru inscriere, schimb 
de programe și documentaţie, scriind pe adresa: 

CRC-T casuţa poştală 8-769 Tanişoara 
sau telefonind domnului: 
VALER IOSIVAN  961/44200 
Vă așteptăm! 


Am contactat, pentru Dvs, cluburi cu aceleaşi 
preocupări din Statele Unite, în vederea 
schimbului de programe “HOT” şi a ultimelor 
noutâți în materie. 


Ms. MONA SPURGEON - president 
1117 LAVERN AVENUE 
KETIERING, OHIO 45420 

USA 


Acest club, după cum ne scrie Dna. MONA 
SPURGEON, este inființat acum îi ani, find cel mai 
mare de acest gen (Commodore, Amiga) dn zonă. 


MILW AUKE 

AREA COMMODORE 

ENTHUSISTS CLUB 
2137 W. GREENFIELD AVENUE 
MILW AUKEE, WI 
USA 


Un club nou infințat cu doar 95 de membri. Ne 
invită în fiecare săptămină la ora 7:00 PM la 
intrunirie lor. 

Vom reveni cu noi amânunte. 


Am primit scrisori şi de la două cluburi din țară. Nu 
avem confirmarea incă de la membri fondatori ai 
acestora, totuși le vom anunța: 


Club Spectrum - Tirgu Mures 
Club Atari - Săcele 


Dacă mai există cercuri sau chburi care doresc 
sa le publicăm adresele, le rugăm să ne scrie. Totuși 
redacția nu este răspimzătoare pentru veriă- 
citatea catel. 





CU SAU FARA 


JOCIRI 


MMHAEL A GORODCOV 


dată întrebarea. la tei ca în 
"clasicul “Shakespeare, ui răs- 
puns unic nu există. 

Sa verdem de ce. 

n 1990, țara noastră a fost 
inpicată ist proiect mnter- 
națonal -TEC- de i tare a 
calculatorului în scol, astfel incit în 
clipa de față 680 de elevi între 
9-10 ani din 17 țări, înve care și 
Romania, au fost supuşi acestu 
experiment (vezi Stinţă și Tehnică 
nr, 3/1931). Am avut astfel prilejul 
să discut cu diferite persoane 
implicate în proiect, și in final, să 
ajung la întrebarea: 

cu sau fără jocuri? 

Un posibil răspuns ar ft depinde. 

De pidă in Canada, inuvr-una din 
scolile in care calculatorul este de 
mult instrument didactic, era pus 
un afiș mare şi cit se poate de 
sugestiv: în școală sint mterzise 
cu desăvirşire jocurile pe calcu- 
lator, ele se practică numai ACASA 

Acest lucru presupune mai 
multe aspecte; pe de o parte, 
dotarea din școală incepea de la 
PC în sus, copi își pregăteau te- 
mele pe calculator, profesori îl 
foloseau ca instrument didactic 
iar sistemul de învățare era ca- 
racterizat prin interactivitate. Pe 
de altă parte i se atribuia In mod 
Clar o funcție recreativă, de agre- 
ment sau de stimulare a unor 
aptitucâni 

Reverin la acel "depinde. Si 
dacă gievii nu sint famiarizați Cu 
calculatorul din motve dverse - 
dotare  ineficiență în scoli (ne 
exprimâm aproape eutemistic |) 
prejudecăți, lipsa unor programe 
eficiente care să ntrunească atit 
criteri pedagogce cit și științifice 
- atunci ce-i de tâcut ? 

Vrind-nevrind ne apropiem de 
jocuri, acele jocui minunate, care, 
pe lingă atractivitatea lor certa, 
obișnuesc copilul cu tastatura, CL! 
calculatorul văzin că partener de 
dist ace. Desigur câ există JOCtr! 
si jocun imete sint extrem de 


banale, altele insa stimulează 
atentia, obhga copil să-și folo- 
sească cunoștințele Gintr-un 
anumit domeniu să participe la o 
anumită poveste în care practic 
este  itegrat, să reacționeze 
rapid și prompt, pe scut i se 
ofera o inveagqa aventura prin 
intermediul ecranulu calculatorului. 

De altfel, mai ales în ulterui 
deceniu, incdustia de jocuri a 
aie ami jel ŞI simplu, mă Și ma de 
mari a tip de calmdator 

în ee lati la i sait micilor 
utilizatori. Mai mut decit atit, ca 
rezultat a numeroase expe 
rimente, a reieşit câ cei mai buni 
creatori de jocuri sint copi, ne- 
maivorbind de faptul că in 
prezent, mai toate personajele 
desenelor animate sint create tot 
de . .. calculator, Dar acesta este 
deja un alt capitol Așa cum tot un 
alt capitol il constitue și marea 
aventură a informatici moderne. 
crearea PC-urilor cu legenda lor 
despre doi băieţi foarte tineri și un 
garaj in care... 

Revenind insă la jocuri, am 
tratat numai ... copi ca utiăzatori 
exciusivi. în realitate kicrurile nu 
stau chiar așa. S-au făcut anumite 
exprienţe şi s-a ajuns la concluzia 
că, în acele birouri in care au 
apărutt ca printr-o minune și cal- 
culatoarele, angajaţii au reușit sâ 
se apropie de calculator numai în 
momentul în care a imtervenit o 
dischetă cu jocuri ! 

Aşadar, cu sau făra jocun ? 

Credem ca un posibil răspuns 
a' fi cel afirmativ - impu de 
experienţă - dar cu discernâmint. 
Căci numa asttei i se poate 
acorrta calculatorului locul pe care 
N merită în viata noastiă 
cotidiană, 





Sa stăm puțin de 


vorbă . 


Dragi prieteni, aceste rinduri să 
incercâm să le scriem fară for- 
malsm. Eu sint, să zicern. LARRY 
(ei da cel cin Joc). 

Le rnultumesc tuturor celui care 
ne-au suris. Si m Sint parte, 
credetți-mă. Pentu toți acei care 
=e indoiau de raspunsul mei so 

zoarea Ta, prietene. este ciura m 
chiar ZIUA SCS ei la redacţie, lar 
+aspunsul NU poate să intirzie, de- 
carece răspurileri la ABSOLUT 
tvate scrisorile. Deu. dacâ nu 
primesti nici un râspims în maxim 
2 zie atunci inseamnă câ 
scrisoarea ta nu a apns la noi 

Le mutumesc si celor care 
ne-au trunis plicuri pentru răspuns, 
dar ii astgurâm câ nu este nevoie 
cie un asemenea lucru 

Este bine sa menționați pe pic 
rubrica ce o aveţi in vedere 
Dacă nu Nu 


„1 este explicit dacă 
480 lei trebuie trimişi in plic, 


cash sau măresc valoarea 
mancatului?" 
Aurelian Mateescu 
Bucureşti 


Sumate prietene, ai dreptate. Din 
text nu reiese clar acest lucru. 

Această sumă reprezmtă taxă 
de timbru în momentul expecheri 
următorului număr, prim poștă, 
celor ce ne-au trimis talonul de 
rezervare. Deci se adaugă 
prețului revistei 

Am primit această sumă și în 
plc. E bime şi aşa, noi o vom 
păstra pină kna vitoare. 

ih numărul trei al revistei vom 
publica contul unde trebue de- 
pusă intreaga sumă şi lucrurie se 
vor simplifica enorm. 


„a în legătură cu apa- 
5 Atid riția revistei fa se 
Ay vrea lunară, Și totusi . . 
ii Am rezolvat probie- 

mele legate de tipărie, 
ar ne confruntăm cu cele de 


rifuzare, revista  tipărndu-se 
intr-un tiraj relativ redus. 
Pentru acest lucru prieteni 


apelâm la voi pentru a o râspindă 
i toata țara. 
continuare în pag.30 





Spectrum 
BETA BASIC 


(HI) 


Numărul mare de scrisori primite la 
redacţie ne-au determinat sa continuăm 
prezentarea, in oiolul 'Beta Basio' și a 
comenzile ce nu au fost expuse in nu- 
mărul anterior. Astăzi  detaliem 
comenzile folosite pentru casetofon, 
micro-—drive și proceduri. 


COMENZI CASETOFON 


SAVE (portiune) ; nume 
-Tasta : normal 

-Salvează pe bandă porțiuni de program. 
—exemplu: Save 10 TO 20;p' salvează 
toate liniile de program între 10 si 20 cu 


Lă PL] 


numele "p 


SAVE DATA ; nume 
-Salvează toate variabilele atribuind blocului 
numele oferit 
—exemplu: SAVE DATA; "variabilet” 


VERIFY (porțiune) ; nume 
-Tasta: normal 
—Verifică blocul salvat cu SAVE 


VERIFY DATA nume 
-Verifică blocul salvat cu SAVE DATA: nume 


COMENZI MICRODRIVE 

"Beta Basic” introduce urmatoarele 
comenzi și funcții utilizate in luoru cu 
Miorodrive-ul: 


CAT (nr. micro) 
- Tasta: normal 


DEFAULT =m/t/n/b număr 
-Tasta: 2 


ERASE (micro) ; nume 
-Tasta: normal 


LOAD (micro) : nume 
-Tasta: normal 


RENUM (*) (portiune) (LINE nr. linic) 
(STEP pas) 
-Tasta: 4 


SAVE DATA (micro) : nume 
-Tasat: normal 


VERIFY (portiune) ; (micro) ; nume 
-Tasta: normal 


VERIFY DATA (mioro) ; nume 
-Tasta: normal 


EOF (nr. canal) 
- Tasta: FN e( 


PROCEDURI 


"Beta Basic” introduce un nou tip de 
structuri, numite proceduri. Acestea sînt 
foarte  asemânătoare  subrutinelor, avînd 
față de acestea avantajul că sînt chemate 
print numele procedurii si nu prin numărul de 
linie. Pe de altă parte acest mod de 
adresare este mai rapid deoarece adresa la 
care se găsește procedura este fixată 
înainte de rularea programului și deci nu 


“hobBIT 


trebuie cautată în tot listingul Alt avantaj 
este acela că definiția unei proceduri se 
poate gasi oriunde în listing fara ca acest 
lucru să-l intereseze pe utilizator. Procedu- 
rile trebuie privite ca niste programe de sine 
stătătoare care pot interacționa sau nu cu 
restul programului. 


DEF PROC nume, (parametru), (REF 
parametru), . . . 
-Tasta: 1 
-Definiste o procedură. Numele este format 
dintr-un sir de caractere, acestea 
respectind regulile pentru numele de variabile 
(primul caracter trebuie să fie o literă, etc.), 
lungimea numelui poate fi oricare, iar 
majusculele sînt tratate la fel. După nume 
urmează o listă de variabile numite 'para- 
metrii formal”. Aceste variabile pot avea 
acelaşi nume ca cele folosite în programul 
principal făra ca acestea din urmă să fie a-— 
fectate de modificările din timpul procedurii. 
Definiția unei proceduri se încheie cu END 
PROC. 


ex: 10 LET k=7 

20 DEF PROC qwerty, k: REM definește 
procedura "qwerty” 

30 LET k=8: PRINT ="; k 

40 END PROC: REM terminat definiția 
procedurii "qwerty” 

50 PROC gwerty, k: REM cheama 
procedura "qwerty” 

60 PRINT "k="; k 


Rularea programului anterior are ca efect: 


k=7 
Dacă înaintea unui parametru din lista 
parametrilor formal apare REF atunci 


parametrul devine variabilă 
ii 
Dacă după numele procedurii nu urmează 

nici un parametru , atunci variabilele utiizate 


in programul 





in procedură nu conservă valorile celor din 
programul principal, putind fi utilizate după 
întoarcere. 

Dacă după numele procedurii urmează 
DATA înseamnă că procedura nu are 
parametrii formali stabiliți, dar acestia pot fi 
citiți cu READ și ITEM dintr-o listă DATA. 


END PROC 

- Tasat: 3 

-Este situată la 
PROCeduri. 


sfîrsitul  DEFiniţiei unei 


(PROC) nume, parametru, parametru, ... 
-Tasta: 2 

-Produce execuția procedurii cu numele 
cerut și parametrii formali specificaţi. 

-PROC poate să lipsească. 

-Dacă nu este chemată de '(PROC) nume 
atunci procedura dintre DEF PROC și END 
PROC este ignorată în timpul executări 
programului, de aceea definițiile procedurilor 
pot fi plasate oriunde în program. 


LOCAL. variabila, variabila, . . . 

-Tasta: Shift + 3 

-Declară ca parametrii formal variabilele ce 
urmează după LOCAL, aceste variabile find 
diferite de cele declarate ca parametrii în 
definiția procedurii. 


REF retermta 

-Tasta: Shit + 7 

-Ajută la găsirea în listing a unei referințe. 
O eferintă poate fi orice variabilă, număr 
“au sir de caractere. Dacă referința este 
găsită atunci! linia de program .care o 
contine este adusă în zona de lucru; dacă 
nu este asită apare mesa: ” O OK ” 
Pentru a câuta si aparițiile ulteroare din 
isting poate hi utilizata o bucla : 


DO : REF referintă : LOOP 





referință caută 
a$ a$ 
car car. numerică car 
"car" sirul “car” 
4 numărul | 
(a$) sirul conținut de a$ 


(dacă a$='car” 
atunci RAF caută 
'car' şi nu a$) 
(Z) numărul conținut de 

var. numerică 
(dacă z=3 atunci 
REF (z) = REF 3) 

Ma jusculele şi minusculele sînt tratate la fel 

de REF. 


ALTER referinta IO referinta 

- înlocuieste o refrință cu alta. 

—exemplu: ALTER 10 TO 3 înlocuiește toate 
numerele de 10 cu 3. 


LIST REF referinta 
-afişează liniile de program în care apare 
referința cerută. 


LIST PROC nume 
-—LISTează procedura cu numele cerut. 


MESAJE DE EROARE 
Mesajele de eroare au în Beta Basic un 
cod specific, ce pot fi utilizate de TRACE și 
ON ERROR (în afară de 0--9): 
eroare cod semnificatie 
OK 
NEXT without FOR 
variable not found 
Subscript wrong 
Out of memory 
Out of screen 
Number too big 
RETURN without GOSUB 
End of file 
STOP statement 
Invalid argument 


OVONDIAUND=O 
POPAS OAUN-O 


—_ 


ți B integer out of range 
Ne, e Nonsend in Basic 

13 D  BREAK-CONT repeats 
14 E Out of DATA 

5 F invalid file name 

6 G No soom for line 
17 H STOP without NEXT 
18 | FOR without NEXT 
19 JJ Invalid 1/0 device 
20 K Invalid colour 

21 L BREAK into program 
22 M  Ramtop no good 
23 N Statement lost 

24 O invalid stream 

25 P FN without DEF 

26 Q Parameter error 

27 R lape loading error 
28 S Missing LOOP 
297 LOOP without DO 
30 U No such line 

31 Y No POP data 

32 W Missing DEF PROC 
33 X No END PROC 


Literele b-y (codurile 43-66) sint rezervate 


erorilor cu interfața |. 

Beat Basic introduce 25 de variabile ale sistemulhă 
236525 (2) pruma linie a proceduri în LST XC 
57358 (2) ultima linte a procedurii in LIST 
57362 OVER 2, 1 temporar status 
57363 OVER2P permanent OVER 2 status 

1-OVER 2, 0=not OVER 2 
57364 X-coord a ecranulu (nu şi CSIZE 0) 
57365 Y-coord. 
57366 X-Right maximum x-coord. (in WINDOW) 
57367 Y-Left maximum y-coord 
57368 Y-boot minimum y-coord 
57376 CURWIN curent WINDOW, O pentu 
WINDOW 0, altfel nr. WINDOW+28 
PRE | TY =trar cind incepe listingul =0 
57382 LNS -0 doar cind nu exista nici o linie 
57383 KYWD KEYWORDS (2, 3 sau 4) 
57394 numărul de mă in ecran 
: numarul dle caractere/inie 
57395 DEFAULT Microdrive/station number 
57335 DEFAULT t/m/n/b 


61216 LSF ul adresei dn ecran la care scrie 


CLOCK 
61318 MS... 
565866 Numarul de 1/50 intr-o secunda 
58370 =54 penuu 60 secunde/minut 
=53 pentru 100 secunde/minut > 





spectrum . MONS 


MONS putem spune ca este vnul dintre 
cele mai reuşite programe dn famila 
monitor—dezasamblor pentru Spectrum. 

in momentul de față există mai multe 
variante (MONS 3M, MONS 3M 21, MONS 4) 
dar care au aceleași comenzi si lucrează la 
fel, diferența constind in subprogramele 
pentru imprimantă sau microdrve pe care le 
conțin, sau in numărul de caractere afișate 
pe o linie. Acest monitor este relocatabi. 
Programul se lanseaza in execuţie la adresa 
la care a fost incărcat, iar la relansare de 
la o adresa cu 29 de octeți mai mare. 

La intrarea in program ne apare un ecran 
pe care il putem numi "PANOU FRONTAL", 
care conține: 


- pe prima linie de sus : adresa si codul 


mstrucțiuni unde se află "MEMORY 
POINTER” (MP.) 

- in stinga sus se afiseaza toate 
registrele si conținutul lor in momentul 


respectiv. 

- partea de jos a ecranului conţine 24 de 
adrese si conținutul memoriei la aceste 
adrese, centrate fața de adresa MP. 

- in dreapta sus se afișează cite 7 octeți 
în dreptul fiecărui registru, începind cu 
adresa conținută în registrul respectiv, în 
cazul lui 'F' se afișeaza flagurile setate. 


+ CS+1 
2- CS+5 
3— CS+7 
4- CS+8 
5 SS+3 


>revenire in Basic 
>decrementează MP. cu 8 
>decrementează MP. cu 1 
>inocrementează MP.ou 8 
>schimbă afișarea adreselor 


VIOREL STAN 


continutul 
afisat 


in zecimal, 

memoriei ramine 

in hexa 

>se revine 

nou SS+3 

7- CR >inorementează MP. cu ! 

8- G (Getj»>oaută in memorie un și de 
octeți. 

Apare ” : , se introduce primul octet, se 

tastează Ch, iar după ce este găsit se 

tastează al doilea octet urmat de CR, și 

coritmuăm pînă denificărn şirul, 


6 — apăsind din 


3- H >convertește un număr 
zecimal in corespondentul 
sâu hexa. 

10- | >copiază un bloc memorie 


de la o adresa la alla. 
Se introduc: adreseie de început și sfirșii ale 
blocului și adresa la care trebue copiat. 
11-J >execută codul mașina de 
la adresa pe care o m- 
troducem. 
ATENTIE ! Această vomandă sohimbă 
registrele 780 inainte de executia 
codului masina. 


12- SS+K >execută cod mașina de 
la adresa curentă a PC. 
13- L >listează un bloc de 


memorie in hexa și ASCII 

Se revine cu CS+b sau orice tastă pentru 

continuare. 

14-M >setează MP. 

Adresele se introduc numai in hexa. 

- N >caută sirul introdus cu 
comanda 'G' si semnalea-— 
za toate aparitiile lui ince-— 
pind cu adresa data de 
M.P. 


16-00 >tace un salt luind 





ca deplasare relativă byte-ul 
curent, continutul M.P. 
>introducem doua adrese si un 
octet. 
Programul umple zona de memorie dintre 
cele două adrese cu octetul specificat. 
18- Q  >afiseaza al doilea set de 
registre al microprocesorului. 
193- SS+T >introduce un punct de intre- 
rupere după  instructiunea 
ceruta (data de MP.) 


17- P 


20- 1  >dezasamblează o zona de 
cod maşina, cu opțiune de 
imprimantă. 

Pentru imprimantă se răspunde la 


“PRINTER?” cu CS+Y, altfel afisarea se va 
face pe ecran. 

După aceasta întreabă "TEX!”?" la care 
se răspunde cu adresa de început a fișierului 
cu comentariul aferent dezasamblării, sau cu 
CR dacă nu avem text. 

in continuare la întrebările "FIRST" si 
“LAST” se introduc adresele de inceput și 
sfirşit a zonelor de date ce vor fi 
interpretate ca DEFB. In caz că avem mai 
multe zone se dau toate perechile de 
adrese, iar cînd terminăm se tastează CR la 
întrebările "FIRST" și "LAST". 


-se întrerupe dezasamblarea 

cu CS+b. 

Y —cînd întîlnește un ccd de in 
strucțiune invalid îl afişează 

F NOP” 





>actuahzează display-ul cu 
valorile dinaintea  execu- 
târn comenzii 'O'. 

>formează o adresă pe 6 
biți dm valoarea aflată la 
MP. si MP.+1 si actuali-— 
zează display-ul conform 
unei instructiuni CALL sau 
JP la acea adresă. 


23- V  >aduce display-ul la configura-— 
tia dinaintea executării 
comenzii 'X.. 

24- W >stabileste un punct de intre-— 

rupere la adresa data de MP. 

Astfel, iulind un program cod mașina care 

ajunge la această adresa, se întrerupe și 

afisează "PANOUL FRONTAL. 

25- Y  >se scrie un sir de caractere 
ASCII al caror cod se insorie 
in memorie incepind cu 
adresa dată de MP. 

La terminarea  sirului' se tastează CS+5 

pentru executarea comenzii. 


26- SS+7 >»executia pas cu pas a 
programului cod masina de 
la adresa data de MP. 

27.- SS+P  >la tel ca si comanda | -— 


afisează la imprimanta. 

Se revine cu CS+5, 

28- SS+M  >pozitioneazăa cursorul pe 
unul din registrele micro-— 
procesorului, afisate in 
stinga sus. 

introducind o valoare în hexa, urmată de 

SS+M această valoare este introdusă în 

registrul selectat. 

-introducind un octet urmat de CR, acesta 

va fi scris în rmemorie la adresa MP. 

-nu pat fi modificate registrele SP și IR. 


In numărul trei al re- 
vistei vă vom prezenta: 


GENS 


Nu pierdeţi numărul 3! 





Microprocesorul 6502/8510 este mai puţin cunoscut la noi deși se 
foloseşte din ce m ce mai mult. Acest integrat nu este altul decit cel folosit la 
Commodore 64 şi 128. incepem m acest număr o prezentare a acestui procesor, 
prezentare ce se va intinde pe mai multe luni. Vom moepe ou noțiunile de bază, 

urmind apoi toate celelalte instruoţiuni ce alcătuiesc //mbajul mașină 





Comenzie în imbajii maşina propriu microproce- 
sorului 6502/6510 (pe 8 biți) se pot impărți în 
-comenzi de transfer 


-comenzi de intrare/ieșire 
-comenzi de setare flag-uri 
Comenzi de transfer 
Aceste comenzi se pot executa între două regstre 
spre Un 3 este o zonă din memorie 
în care se pot intr sau extrage date. Comen- 
zile sint de genul "pull sau "push. 
Comenzi de prelucrare 
Comenzie de acest tip operează asupra unor date 
sau grupări de date. Ele sint de genut 
=oper ați aritrnetice (adunare, scădere) 
=oper ați logce (AND, OR, EXCLUSIV-OR) 
=oper ați (SHFT  LEFT/RIGHI, 
ROTATE LEFT/RIGHT) 
=ncrementare, decrementare 
Aici se cuvine să introducem noțiunea de CARRY. 
Ce este carry? Un mic desen ne va explica imediat 
acest lucru 


iu Srem 
za 


ROTATE LEFT 


LIMBAJ MASINA G5 O 2 / 05 


N 


Asta este ! - în cazul unei 'shift-Ari (adunare), dacă 


se depășește capacitatea de 8 biţi carry este ca și 


atunci cind adnăm 55 cu 66. Sase și cu cinci fac 
unusprezece, unu si ținem unu, pe care || a 
adunarea urmatoare. Carry se adună le alți 8 bii 
La o rotaţie (inmuțire) find în binar, toti se 
cu 


deplasează spre stinga. La fel și la impărtire; 
re că deplasarea este spre dreapta. 


Comenzi de testare 
Se poate testa un bit, care în funcție de valoarea 
sa poate fi '0” sau f. 


Comenzi de imvare/iesire 
Aceste comenzi vor fi tratate separat, in moment 
cind vom ajunge la acest capitol 


Trebuie să ne oprim puţin la operațiile logice. 
Si SAU 


EXCLUSIV-SAU 
] 
AND ORA EOR. 
Funcția AND 
O AND 0=0 
O AND1=0 
1 ANDO=0 
1 AND1=1 
Funcţia ORA: 
O ORA 0=0 
O ORA 1 =1 
1 O0RA0O=1 
1 ORA 1 =1 
Funcţia EOR 
O EOR 0=0 
OEOR 1 =1 
1 EORO=1 
1 EO0R1=0 


utăzatoru să poate să-și facă o 





Bitul O -C 
sera za Dc se loloait în operaţie de trunutiira Îi 





Comerizi ADC, ASL, CLC, CMP, CRX, CPY, LSR, PLP, 
7:55. 4: 3: ROL, ROR, RTL SBC și SEC. 
EA ORNEIEI n 
BREAIC | MERITI, O CARRY Praf vacă 
Funcțiune: 
Acești biți se numesc steaguri (flag) A (A) + data +C 
Bitul 7 - N- negativ/pozitiv 


indică semnul dacă este "0 număru este pozitiv, 
dacă este 't numărul este negativ. Testind acest bit 
( citind valoarea lu) ne putem da seama dacă 
numărul cu care lucrăm este pozitiv sau negativ. 
Comenzi din Pmoali BE, Care au ENect, asura 





in imba engleză înseamnă “"depașire”, : 
Comenzie ce actionează asupra sa sint: ADC, BIT, Filaguri ere Tree) 
CLV, PLP, RTI și SBC. 
Bitul 5 - nu este folosit. păcate Înca O 0 EP II SR RD 
Bitul 4 -B - break 
Acest flag acţionează direct asupra activități Pagina 01100101 = 
microprocesorului atit hard cit și soft, zisa bbb=001 nică tă 
Comenzi PLP şi RTI 
Bitul 3 - D - decimal ivrect bbb=010 HEX =69 
Dacă acest bit are valoarea “1 procesorul lucrează 
în mod zecimal dacă are valoarea "0" se lucrează în Absolut, X  O01H101 HEX = 7D 
Di bbb=ttt 
Comenzi CLD, PLP, RT! şi SED. 
Bitul 2 - | - interrupt iai at 8/0 1 III anale 
Se mai reia ai și “mterrupt-mask”. Cu valoarea “t 
in acest bit se poate bloca procesorul. A 
Comenzi BRK, CL, PLP, RTI şi SEL ii to A carora A ad 
Bitul 1 -Z- zero (incăir 01110004 Ă 
Acest flag face ca procesorul să lucreze in pagna ii dd bbb=100 PER si 
zero (vom reveni la sit: zare CPV, DEC. 
Comenzi ADC, AND, gară CMP Y, ina zero, X 01110101 HEX = 75 
DEX, DEY, EOR, ÎNC, NX, NY, LDA, LDY, LSR, ORA, PLA, Payne bblb=101 


PLP, ROL, ROR, RTI, SBC, TAX, TAY, TSX, TXA şi TYA. 


6502/6510 „n.n si 





(indirect, Y) 00110001  HEX=31 Poate că ia prima vedere acest limbaj mașină pare 


bbb=100 greoi şi ineticient. După ce vom prezenta întreg i 
E = de instrucțiuni, cu explicațiile necesare, utăzatorului 
Pagina zero, X renale HEX = 35 va fi ușor să ptogrameze cu ajutorul unui asamblor. 
Deci răbdare și... 
ASL . - .. 
continuare in numarul viitor 





La o mutarea spre stinga, in poziţia bitului “0” se 
introduce valoarea “0. 


um ms 0502/0510 





Jocuri 
comentate 


Spectrum 


MOVIE 


Marlowe privea de citva timp, obosit, pringiiă 
fereastra intunecată. Brusc, se intoarce sii 
face cițiva pași spre birou, caută ceva, dar nu 


găsește nici o indicație care să-l apte la e nb, 


gâsirea benzii de casetofon ce l-ar duce la cel mai 
mare ga cin New York. 

Fata trebue să fie undeva, iar primejdioasa ei 
soră ru prea departe. Dacă ar găsi-o, ea l-ar duce 
la casetă, altfel sora ai l-ar duce la moarte. Cu miinie 
în buzunar, Marlowe pornește pe străzile orașului 
stăpinit de gangsteri. 

Tu ești regizorul acestui film, dar producători săi 
dictează scenariul Movie folosește imagini in 
perspectivă simiare cu cele din Knight Lore (tot al 
firmei Ultimate) și dn Fairight, al firmei Edge. în orice 
caz, realizarea nu a fost abordată pină acum într-m 
mod atit de original climei iuti a 
creeze atmosfera necesară. 

Distanțarea față de realizarea tradițională a 
aventurilor 3D de la Ultimate se face prin posibilitatea 
de a conversa cu personajele. Detectivul din Movie 
poate vorbi cu gangsteri papagah și cu femeie 
misterioase. Selectează comanda “speak”, repre- 
zentată de un balon, tastează o întrebare ca "Do 
you want the money ? şi ascuttătorul va răspunde 
într-un balon asemănător. Discuţiile din baloane dau 
aventurii un aspect comic. De obicei doar tipă simpa- 
tici au chef de vorbă, cei antipatici îţi intorc doar un 
cuvint, două, La inceputul jocului cietectivul nu are 
nici un indiciu și nici un mijoc de apărare; e! trebuie să 
le caute în labirintul camerelor şi al străzilor. Prima sa 

grijă ar trebui să fie găsrea unei arme. Deoarece 
fundalul, obiectele și personajele au aceleași culori, 
armele nu se prea disting Pistolul tâu care e la două 
camere depărtare de birou, va trece probabi 
neobservat prima dată cind vei intra in cameră. 
Treci prin camera de primire albastră si îl vei găsi pe 
un tonomat in camera gabenă. Nu e ușor să iei 
obiectehe findcă trebue să te poziţionezi foarte 
exact pe ele. Uneori obiectele se află intr-un loc 
inaccesibit ca să ajungi la eie trebuie sa folosești 
altele luate inainte, folosind comanda throw 
(mdicată de o săgeată in meniu ce pe ecran). Dar nu 
incerca să iei bomba dn virful stivei de cutii ! 

Nici armele nu sint prea uşor de folosit rar 
gangsteri nu jindesc prea mult cind e vorba de 
tras. Pe chestia asta trebue să mtri pe usă cu mare 






iar gangsterul poate fi oriunde in cameră. 

Odată inarmat trebue să găsești o geantă, o 
bombă şi o grămadă de bani. Ele se află în acelaşi loc 
in fiecare joc. Cel mai bine ar fi să iei mai intii geanta, 


VĂI putea ca fata misteriosă să fie inăuntru 

itp Stringerea banilor e treabă ceva mai 
Comeicată. Vei iniini un mafiot pus pe impușcat tipi 
naivi ca tine şi care de obicei işi nimerește ținta. Ca 
să scapi de el mergi in dreapta uși apoi, scrișnind din 
dinți, mtră și mergi drept spre ei impușcâtura hi ru 
va avea nici un efect iar tu te vei putea intoarce la 
stinga pentru a intra in următoarea cameră. 

către bani te duce pe șase alei inguste, fiecare de 
altă culoare. Apoi o mică pimbare prin două ba oui o 
cameră goală și una mai mică te vor duce la dolari 
de pe podeaua a încă unul birou. Bineințeles că bară 
el să pentru mită. N-o să cauţi prea departe ca să-ți 
găsești un mușteriu. Poate te-a mirat că ună bandiți 
nu incearcă să te omoare, ba chiar au chef de 
vorbă. S-ar putea ca așa să obţii ceva informați 
cifrate, inclusiv o poantă care să te ajute ha 
căutarea casetei. Bombele le găsești și prin 

printre mese și lăzi. După ce ai luat bară ţi-ar fi utilă o 
bombă pe care o poţi găsi în aceeași clădre cu 
bancnotele - intrun bar păzit de două gorie. 

Gangsterii poți să-i omori cu bombe și gloanțe, dar 
există și alte obstacole care te împiedică să aing la 
bandă. Cind am jucat Movie prima oară am crezut 
că era o banală poveste polţistă în stiu ku Dashiel 
Haminet sau Raymond Chander. Cur ind insă, am 
aflat și aspectele de “arcade game” ale aventuri - 
piese de mobiler, mingi și patrupede zburind cu 
detașare prin camere. Pot exista mai multe tipuri de 
obstacole intr-o cameră iar in unele sint chiar lăzi 
fixe și alte obiecte mai complicate. Nu te speria 
funcdică toate camerele au o soluţie. 

Din păcate, fata misterioasă nu e chiar așa simplu 
de găsit. La inceputul fiecărui joc ea se poate afla 
oriunde, dar există citeva locuri unde ar fi bme să o 
cauţi, De exemplu, am întinit-o de citeva ori în sala 
de concert sau. Ei dar vrei să le afli pe toate P? 

Succesul este apreciat in Movie după două 
criterii. Primul este un scor procentual dat de număru 
de camere vizitat (pimbindu-te peste tot vei obtine 
probabil destul de mute puncte). Al doilea 
este un scor ce poate varia inte 000 și 09% a 
este dat de obiectele speciale pe care le ai de 
incliciile folosite și de problemele rezolvate. Dacă 0bță 
045 şi ai pistolul, bomba, bană şi parola - care te vor 


mobT ii 


ajta să intri în unele camere 
păzite - inseamnă că te descurci 
bine. Movie are succesul unui 
fim bun, cu toate iree grafica este 
incă departe i 
alte reakzări, cum ea Ape 
fi Fairtght. Totuși % 
acţiunea combinată 
cu 3D-u te pot face 
să mergi destul de 
departe... 












Commodore 


Zak MchKrackhen 
and the Aliens 
Mindbenders 


După succesul din 1987- Manic 
Mansion- casa software 
Lucasfim Games realizează in 
1988 un alt adventure deosebit, 

Structura jocului este identică cu 
“Maniac Mansion” dar acțiunea 
este cu mult extinsă, ea desfășu- 
rindu-se in majoritatea orașelor 
mari ale gjobutu și... pe planeta 
Marte. in plus, riumărul perso- 
najelor participante la acțiune 
crește Zak Mckracken Annie 
Larris, Melisa China si Leshe. 

Zachary Mekracken, reporter la 
“National Sleazy  Tabloit este 
trimis de către redactorul-sef la 
Seattie pentru a scrie un articol 
referitor la primul OZN ce 
aterizase în apropiere de muntele 
Rainier, cu aproximativ 50 de ani 
în urmă. Deasemenea, acolo se 
află și o veveriță cu două capete 
care constitua un subiect de 
mare nteres 

Jocul începe cu prezentarea 
unui vis al lui Zak, un vis destul de 
stupid şi fară sens (in stadii 
acesta). Pe parcusul jocului, este 
surprinsă discuția a doi 'alens' 
aflați intr-o cameră secretă (de 
sub camera hui Zak), din care 
reiese dornța acestora de a 
defnitrva construcția unei masșni 
diabolice cu ajutorul cărei să 
reducă gradul de mtehgență al 
Pămintenior. Singurul mod de ai 
opri il reprezintă construrea și 
activarea unui “Skolarian Device - 


obiectul visat de Zak- device 
compus dintr-un candelabru, o 
sferă scipitoare și trei cristale 
(albastru, galben și ab). 

n emisiunea de știri aflăm că 
efectele mașini au inceput să fie 
resimţite pe intreg Pămintu. se 
mai prezintă două interviuri, unu 
cu Melisa, aflată impreună cu pri- 
etenul ei Lessie pe Marte, iar cel 
de al clotea cu Annie, colecționară 
de antichități. 

Cristal galben se gâsește in 
peştera de la Seattie iar după 
depunerea lu în slot-ul magazinu- 
li de antichități urmează o 
discuţie intre Zak și Annie. Din 
acest moment este valabiă o 
nouă comarnriă: SWMTCH fimd po- 
sbiă alegerea a incă trei 
personaje. Annie ii dă hu Zak » 
bucata cin  cristahi 
cealaltă bucată  aflindu-se în 
templul incas din Mexic. 

Marele vrăjtor Guru (Nepal) îl 
poate invăţa pe Zak cum să ută- 
zeze cristaki albastru pentru a se 
putea transforma în orice animal 

Pentru a putea asambia cristahu 
galben, cele două bucâţi trebuie 
puse pe altarul de la Stonehenge 
(Londra) iar Annie să citească un 
“scro, fapt ce duce la apariția 
unui fulger.  Candelabru și 
papirusul se gâsesc in peştera 
peruviană în formă de ochi. 

Vraca Shaman (Zair) dezvâlue 
utiitatea cristakdui galben (posbi- 
tatea  teleportări) cu ajutorul 
hârţii visate de Zak. în schimburi 
unei crose de golf, acesta poate 
interpreta “Ancient Dance" in fața 
li Zak (fâră de care nu poate fi 
deschisă ușa Maretui Tempiu de 
pe Marte). 

i avion Zak trebuie să distragă 
atenţia  stewardesepentru a 
putea lua bricheta și un rezervor 
cu oxigen. Desigur, acestea sint 
doar amănunte esenţiale deoa- 
rece nu vreau să rapesc plâce- 
rea' jucătorului de a descoperi 
celelalte tane ale acestu minunat 
aciventure. 

Totuşi... 

in Sfinx (Egipt) trebuie realizată o 
harță 1 tlabirintultu, acesta (EC 
really  twisty!. Toate muărie 
blocate la exteriorul cârora se 
află “strange markings” trebuie 
completate cu apitorul creionuu 
galben, 










TOP TEN 







3- SHINOBI 





ab se află în 
pe Marte îar 
se poate realiza 
flată într-unul dn cele 
3 labirinturi ale Marelui Templu 


i 

E 

» 
2 


marțian Trebuie subiniat că în 


vederea acestei penultime acțiuni 
trebuie implicați Zak, Mesa și 
Leske. 

Multe  intimplări pot apare 
ciudate jucătorului ce caută uni 
din componentele device-uluii pe 
fundul oceanului ? (și tocmai în 
Tri Bermudetor). 

Poate câ intr-o noapte de iarnă, 
după ore și ore de incercări veți 
putea citi intr m sfirșit mesaat 

'Zak and Annie married together 
and thei life was even better than 
n then widest creams . 
macara ca ati salvat TERRAR 


ANDREI STOICA 
DAN PATRICIU 


SI 





1- GHOULSN 
GHOUSI 
TURBO RUN 
SUPER 
WONDERBO 
GHOSI 
BUSTERS Ii 
WORL CUP 90 
BATMAN: 
THE MOVIE 
7- GAZZA'S 
SUPER SOCCER 


4 
e 3 







4- 


S- 
6- 


9- RAINBOW 
ISLAND 
10-ZAKMCKRAC. 





Totul despre. VIRUSI 


TRAD. CALIN OBRETIN 


Lista care urmează conține carac- 
DN. Mă CNE n) rai 


programele 3 
o organe sama 
ABCDEFGHJ octeti actane 
Chaos soare e.s:a N/A  BODF 
Virus-30 Ma Mae „857 P 
Dropax Fi de Apă 2773 PO 
403% a ERIN 4096 DOPA 
Deu's D NR E da 941  DOPA 
Amstrad no .5 „847 PP 
Payday Xe XXX. 1808 P 
Datacrime x.xxx.. 917 PF 
Suluia/H ae M-a... 2 P 
Do-Nothing a Nas... G09 P 
Sunday „Xa XXX 1636 OP 
Lisbon asia ie 648-.P 
Tupo/F. Pi 3 dpi tei 867 0,P 
DBase MM... 1964 DOP 
GhostBoot .x ....xx.N/A B,0 
Ghost COM ...x. „2351 BP 
New Jeru „x .x xx „808 0P 
Alabama Xe Mee. „560 OPL 
Vankee D. .x.xx....2885 OP 
2930 .X «8 Xe e e „2930 P 
Ashar a oi e:a- Xe: N/A: E 
AIDS sis Mo ete a ite pr 
Disk Kider  .x....... N/A BOPDF 
1536 sala dia p.a 536 0,P 
MXI Să E „68 0,P 
Dark XXXXX. 1800 OPA 
3551 ARE d „3551 PD 
. XX XX. ..1206 0,P 
Xa. .X.. N/A B 
Tupo B. XI i Mux. N/A 08 
Xa. .X.. N/A B 
DataC2 X. „XX „„D4 PF 
car PS FI e ră 
3066 XXX... 3066 P 
1168 Na:oao ai 169. PI 
Saratoga  .x..x.. 632 BP 
405 sas sistal ele 
1704 UR Naae aie T?04 0PF 
FuManc . Xa XXX... 2086 
Cascade  xx.x..... T?701 0P 
Stoned Xe... .X.X N/A O0BL 
Ping P. Ma e. XX N/A OB 
Viena sia aaa aia 648 
Fridaulă O ....x...... 52 P 
„XXX 1908 0,P 


„Normal, mai sit și alti virusi, mai putin 


program. vom  ermumera pe toți 

A BL tari enter 

A - imfectează tabela de partiție a 
hard-discului 

B - mfectează sectorul de BOOT al 

: ari citea 


imfectează sectorul de BOOT al 
floppu-ultui 


infectează fişierele overlay 
infectează fișierele EXE 
infectează fișierele COM 


afectează sistemul de operare 
modifică în program 

modifica datele 

formatează/sterge parti ale discului 


9) 

E- 

F- 

G 

JA 

rile sectoarele de BOOT 
P 

? 

L - modifică legătura intre programe 





Ce sint VIRUSII? 


THE FRIDAY 13th (EXE si COM) 


Cunoscut si sub numele de "Jerusalem PB" 
sau "Israeb'. Sint mai multe variante ale 
acestui virus: A, B, Binou), C,D si E 

Acest virus a fost conceput in israel si 
descoperit pentru prima oara in iulie 1987. 
Are lungimea de 1808/1813 bytes incluzind si 
ultimii 5 bytes care marcheaza infectarea 
fisierelor COM si EXE. Dupa prima infectare, 


computerului, introduce "black boxes" pe 
ecran iar in fiecare zi de vineri 13 sterge 
fisierele in executie. 


THE APRIL îst (tipAsiB) 

Cunoscut si sub numele de ISR sau 
SUR 1 infectind mumai fisierele COM. Are 
8937 bytes. La fel ca FRIDAY 13h ramine 
rezident dar nu afecteaza fisierele EXE. 
Este foarte usor de detectat deoarece in 
momentul infectarii pe ecran apare mesajul: 

"YOU HAUE A WMRUS" 


iar pe data de 1 aprilie afiseaza: 
Me ÎL edi, IT'S APRIL 1ST - VOU HAVE A 


THE APRIL îst (tip D) 

Se mai numeste si SUR 2, SUR 3 sau 
Jerusalem D si infecteaza numai EXE. Are 
1488 bytes si nu ramine rezident în memorie, 
dar foloseste MCB (Memory Control Blocks). 


THE TYPE COM 
infecteaza numai fisierele de tip COM, 
avind o kmgime de 867 bytes. Ramine 
rezident in memorie si fnloseste INT 21 Cind 
un fisier infectat este executat, virusul 
cauta in toate fisierele COM infectindu-le. 
Actimaa sa este de a amesteca valorile 





tastelor folosite. Exemphr “s" in loc 
MIO de "d, "7" în loc de "x". Foarte 
amuzant ..... 


THE 64K COM 
infecteaza numai fisierele COM. 
i STUPID 


produce nici un efect. 


THE MXER 1(îpA&8B) 
Versamea A are 165 bytes i 
35 but MIXER 


S COPES  PROHIBITED BY 
INTERNA LAN... 
Box 1055 Tuscambia ALABAMA USA. 


schimba 
dar fara a le redenumi 
exemplu, rula un fisier DISKCOPY dar acesta 
sa execute fisierul FORMAT. 


VIENA versamea A, B,C&D 
Cumoscut si sub numele de DOS 62, 
imfecteaza numai fisierele COM, inchusiv 
ie enron  ar-c pir 
si nu ramine rezident in memorie. 
distruge aleator fisierele prin ad en 
primăor 5 bytes cu un salt oarecare. 


SYLIUMA WRUS 
Se mai numeste si "Netherlands giri virus", 
infecteaza fisierele COM (exclusiv 


 obBET 


COMMAND.COM), avind o iurigume de 1332/ bytes. lărusul schimba 
drive-ul curent în drive 'C: infectind tot ce este in directoru-ul si 
subdwectory-ul discului, inclusio fisierul m executie. Aproape toate 
fisierele infectate sint distruse, virusul dezactiuind mesa de 
"write-protect'. Numele 'SYLUIA precurn si un mesaj cu adresa sa 
este afisat pe ecran pentru a putea sa trimiteti n carte postala la 
aceasta adresa in schimbul programuha antivirus. NU mcercati:!! — 
nu are nici un anti-uirus, 


DATA CRIME B 

Cunoscut si sub numele de '1280' sau "Columbus day”. Are 1280 
bytes si mfecteaza numai fisierele COM, — ramine rezident in memorie 
folosind MCB. In '? octombrie virusul afiseaza pe ecran: 

1 MARCH 1389, DATACRIME IARUS -si formateaza hard-discul 
(prima pista - este de ajuns ,..). Un virus foarte "rau' care creaza 
mari probleme in toata lumea. Fiti atenti deoarece anti-virusul 
dnei beata doar DataCrime tip A. 


THE DARK. AVENGER 
infeoteaza fisierele COM si EXE. fre lungimea de l505 butes si 
ramine rezident in memorie folosind MCB. FHescrie sectoarele de 
BOOT si face prosti in FAT. Wrrusul Î acnee mesațul: 
EDDIE LR!ES SOMEVIHERE IN 7 


THE FU-MANCHU A 

Denumit si '2086”, infectaaza COM si EX, avind o lungime de 2086 
bytez. Ramine rezilent in memone folosinu MCB. Este cel mai 
Simpatic virus existent. Foloseste intreruperie 21, 9 [Li 16. Dupa 
august 1989 si INT 16. Efecte: 
-cind se apasa CTRL+ALT+DEI apare mesajul:"'The world will be hear 

from me again" 
-ciud se scrie: "fuck" >>>sterge mesajul 
-cind se scrie: "waldheim" >>>continua cur "is a nazi" 
-cind se scrie: "'thacher" >>>continua cu: ''is a cunt" 
-cnd se scrie: "redgen' >>>continua cu "is a arshole” 
-cind se scrie: '"'FuManchu" >>>continua cu: "'virus date: " etc 
Elea cum vedeti, zartori wrusuki nu cunosc prea bime hmba 

za ii 


PING - PONG (AâB) 

Mai este numit si 'Bouncing Bal sau "tahan Virus”. Este un virus 
"dragut" in comparatie cu alte virusuri, mfectind numai sectorul de 
BOOT. Ramne rezident m memorie chiar si resetarea 
calculatorudui (la listarea diretoru-ului se afiseaza cu 2K mai putin). 

Dupa un timp, apare o mica bila ce se plimba pe ecran si nu dispare 
nici dupa reset. infectarea este foarte rapida, chiar si la un simplu 
DIR. Cind se investigheaza discheta (cu PCTOOLS de exemplu) apare 
un 'cluster” marcat BAD, semn ca in acel loc virusul a plasat BOOT -ul 
original (pe o discheta infectata, normal) 


STONED (A & 8) 
Se mat numeste si "Marijuana lhrus” sau 'New-Zealand virus”. Este 
foarte distructiv si mfecteaza sectorul de BOOT. Nu se marcheaza 
"bad cluster” la infectare, Cind se reseteaza computerul apare 


mut 
Your PC is Stoned-LEGALIZE MARIJUANA 
Ramine rezident în ultimii 2K, ai memoriei rzpotati de BIOS, saluind 
sectorul de BOOT original m TRAK 0, SIDE 1, SECIOR 3 pe floppu zi 
TRAK 0, SIDE 0, SECTOR 7? pe hard; virusul nu salveaza si datele 
aflate in sector inamte de infectare, producind man stricaciuni în 
chrectory si FAT. Se cunosc 9 variante de Marijuana Stoned. 
Pentru ma! murte detali, pirteti scrie chiar autorilor Anti-virusula, 
în adresa 


Mr, MARTIN rii 

Ap k 2? PALISADL Av. 
FFCior PARK 

NE Aa ile 

U SH 








Spectrum 


MIS8ION 12 


-program comentat- 


Sa zicem că jocu ce urmează îmbină plăcutul cu 

utilul. Dorim ca în paginile revistei noastre să găsiți și 
ceva uti, nu mumai kstinuri anoste. Mulţi sint cunoși 
să afle cum este realizat un joc, dar n-au avut pină 
acum fericita ocazie. "Mission 12” este comentat ch 
se poate de detalat în ideea că, tastind, veţi 
ințelege care este structura progr'amulu Din fiecare 
istng puteți invâţa cite o tehmcă mteresantă de 
programare. 
“Mission 12” este un 'shoot-em up” simplu, avind 
totuşi calitatea că este rapid și St arică de jucat. 
Trebuie să manevrezi nava prin ecran şi să trag în 
Orice extraterestru care apare. Atenţie și la bombele 
cu intirziere - ele trebue culese in timp de 20 
secunde, altfel.hirșt !  Comenzie navei se fac cu 
tastele-cursor iar focul e obtinut cu tasta '0'. La 
tastarea programuki am făcut următoarele convenții 
pentru a evita erorie posbile: 

- (4*sp) inseamnă să tastezi 4 spați, deci fără ca 
parantezele să apară în ksting; 

- umde apare un caracter ingroșat și intre 
ghilimele el reprezmtă un UDG și este obținut în modul 
Graphics, apăsind tera corespunzătoare. 

Bătătură plâcută | 

Liniile 1000-1090; Mai intii sint definite UDG-urie 
pentru navă, extraterestru şi bombă. Nava este 
formată din patru caractere grafice - ABC și D - 
pentru pawu poziții separate. Extwaterestrul este 
ciefaut de E, bomba F. iar G conţine explozia; HS va 
conține “mghscore-u și H$ șirul corespunzător 
acestu numâr, 

1000 REM UDG. Etc. 

1005 FOR n=USR "A" TO USR 'G +7: READ A: POKE 
NA: NEXT N 

- 1010 DATA 0, O, 14. 120, 254, 720, 140 

1020 DATA 0, 84, 84, PA, 56, 56, 56, 6 

*4030 DATA 0, 0, Ht2, 30, 127, 30, 2, 0 

-1040 DATA 16, 56, 56, 56, 124, 84, 84,0 

1050 DATA 0, 28, 62, 73, 73, 62, 

10650 Da TA 7, 28, 38, 107, 103, 107, 38, 28 

1070 DATA 73, 42, 0, 99, 0, 42, 73 0 

1030 POKkL 23558, 8 BORDER O Nk 7: PAPER O 
GAS 

1090 LET HS=(* LET H$="000000" 

Lmile 2000-2030; Sint  ctefmite  variebiele 
programuhu, SX si SY sint coordonatele nava. SD 
conţine drecția nava (1 la 4); mai urzu va fi folosit 
să aleagă UDG-u corespunzator drecției AX și AY 
iri coordonatele extraterestru e! pleacă din 
coltul hngă stinga sus al e:ci arnuhu, iar AVX şi AVY 





“n 13 
au 
abată 

dau directia lu (este nevoie dle -loua variabie 
deoarece poate sa se deplaseze şi pe ctagonala), BX 
zi BY sint coordonatele bombe. 

2000 REM Varniabie 

2010 LET SX=18: LET SY=18 

2020 LET SD=4 

2040 LET AX=0: LET AY=0 

2050 LET AVX=t LET AVY=0 

2060 LET BX=0: LET BY=O0 LEI BI=100 

Liniile 2100-2120. Este afişat numele jocui pe 
ecran in A$ se află numele autorului care este tipărit 
iteră cu bteră, 

2100 LET A$='(10*sp)MISSION 12: FOR N=20 TO 1 
STEP -t PRINT AT 5,OAȘIN TO >: BEEP 00450 NEXT N 

2105 BEEP 10: BEEP 15 

2110 LET A$="(10*sp)BY 1 DURY: FOR N=20 101 
STEP -t PRINT AT 100;AȘIN TO ): BEEP .001,60: NEXT N 

2115 BEEP 40: BEEP 15 

2120 LET A$="(6*sp)PRESS A KEY TO PLAY": FOR 
N=25 TO 1 STEP -t PRINTI AT 150;4$(N TO) BEEP 
„001,60: NEXT N 

2125 BEEP 10: BEEP 15 

2130 PAUSE O 

Liniile 2140-2150: Ecranu este șters și este afișat 
în partea de jos a sa. 

2140 CLS 

2150 LET SC=0. PRINT AT 210, 'SCORE:000000 

Linile 3000-3090 Nava este deplasata ui 
caracter în direcția ei de mişcare. în linia 3010 
expr esile din paranteze vor avea valoarea 1 dacă 
sint adevărate, 0 dacă sint false. Cum SD poate 
avea doar una din valorie 12,34 la un moment dat, 
numârul 1 va îi adăugat sau scâzut cin coordonata 
corespunzătoare, expresile false neavind nici un 
efect. Dacă nava nu a ajins la marginea zonei de 
joc atunci linia 3020 lasă programu să curgă, altfel 
nava trebuie trimisă inapoi prin schimbarea direcției 
-Aucru realizat de liniile 3040-3070. Linia 3090 
utăzează funcţia ATTR pentru a vedea decide dacă 
INk-ul caracterului pe care te afli este cyan -dacă 
da inseamnă că te-ai lovit de ceva şi deci ești trimis 
ia moarte în linia 6100, 

3000 REM Bucia principală a programului 

3010 LET SX+SX+SD=2)-(SD=A4k LET 
SY45SY+4SD=3)SD=1) 

3020 F SX1 >= 0 AND SX1 c= 18 AND SY1 >= 0 AND 
SV1 <= 31 THEN GO TO 3100 

3030 BEEP .0110: REEP .0120: BEEP 0415 

3040 F SX1 < O THENLET SD=2: GO TO 3010 

3050 IF SX1 > 18 THENLET SD=A: GO TO 3010 

3060 F SYKkO THEN LET SD=3: GO TO 3010 

3070 F SY1 > 31 THEN LET SD=t GO TO 3010 

30890 IF ATTR (SX15Y1)=5 THEN GOTO 6100 

Linie 3100-3250. Linia 310 şterge cu un spațiu 
locul ocupat in prezent de navă, o afişează în noua 
poziţie iar apoi actualizează coordonatele. Urmează 
o rutină foarte asemănătoare pentru extraterestru. 
Linile 3200-3250 schimbă direcția acestua in așa fel 
încit să aibă tendința de a îți lovi nava. 

3100 LET A$Ș=CHR$ (SD+143) 

3110 PRINT AT SXSY:'(t*sp)'AT SX15Y4 INK 6;A$: 
LET SX=SXt LET SY=SY1 

3150 LET AX1=AX+AVX: LET AVI=AY+AVY 


nobBIT 


3160 LET AX AX4+AX1 < OHAXI > 18) 

3470 LE! AYt-Av4+(AY1< OHAY1 > 31) 

3180 F ATTR (AX1A 1-6 OR ATTR (AXAYF6 
THEN GO TO 6100 

3190 PRINT AT AXAY:'(t*sp)' AT AXIAYt Nk 5;E': 
LET AX=AXt LET AY=AY1 

3200 LET AVX=AVX+(AX<SX)/2-4AX>SX)/2 

3210 F AVXc<-1 THEN LET AVX=-1 

3220 IF AVX>1 THEN LET AVX=1 

3230 LET AVY=AVY+AY<SY)/2-AY>5Y)/2 

3240 F AVY<-1 THEN LET AVY=-1 

3250 IF AVY 31 THEN LET AVY=1 

Liniile 3500-3550. Aici se afă șansa ta de a te 
mișca. Apeşi o tastă şi valoarea ei este păstrată în 
6$ pentru o viitoare utăzare. Dacă ai apăsat o 
tastă-cursor atunci SD conţine noua direcție. Dacă ai 
apăsat "0" programul cheamă subrutna “foc”. 

3500 LET B$ANKEY$ 

3510 F B$-'5' THENLET SD=1 

3520 F B$='8' THENLET SD=3 

3530 F B$="6" THENLET SD=2 

3540 F B$= "7" THEN LET SD=4 

23550 !F R$="0" THEN GO SUB 4000 

mile 3500-3990; Cind nu exista nici o bombă 
BF=100. Linia 3600 permit o şansă dn 20 ca o bombă 
să apară acolo wmde nu a existat nici una inante. 
Linia 3510 verifică dacă există o bombă și reduce 
lungimea fitilului cu o unitate de fiecare dată cind 
programul execută bucla principală. Cind bomba 
explodează este chemată subrutma care se ocupă 
de explozii. 

3600 IF BF=100 AND RND>95 THEN GO SUB 4200 

3610 F BF<100 THEN LET BF=BF-t PRINT AT 
2425BF; '(t*sp) : BEEP .000160; IF BF=0 THEN GO SUB 
6000 


3620 IF BF<100 THEN PRINT AT BXBY; INK AF 

3990 GO TO 3000 ot 

Liniile 4000-4100; Această  subrutnă este 
chemată cind este apăsată tasta '0O(foc). Este 
desenată o înie în fața navei folosind operațiile 
logice pentru direcţie. Dacă linia atinge o bombă sau 
un extraterestru este chemată subrutna 
corespunzătoare. Cele doua instrucțiuni PLOT 
afișează traiectoria razei laser. 

4000 REM Rutina pentru foc 

4010 LET X=SY*8+A4: LET Y=A2+-S%X)*8+4 

4020 PLOT OVER $X.Y: DRAW OVER t(SD=1 OR 
SD=3)+(254-X AND SD=3)-X AND SD=1)(SD=2 OR 
SD=4)+(174-Y AND SD=4)+(-Y+24 AND SD=2) 

4030 BEEP .010: BEEP .0140: BEEP .01,5: BEEP .0115 

4040 F BF<100 AND ATTR (BXBY)7 THEN GO 
SUB 5000 

4045 F ATTR (AXAY)7 THEN GO SUB 5100 

4050 PLOT OVER tX,Y: DRAW OVER 1(SD=1 OR 
SD=3)+(254-X AND SD=3)H-X AND SD=1)(SD=2 OR 
SD=4)+174-Y AND SD=4)--Y+24 AND SD=2) 

4100 RETURN 

Linie 4200-4220: Aceasta subrutmă este utiăzată 
pentru a stabii în mod aleator poziția nițială pe ecran 
a unei bombe noi 

4200 REM iniţialzare bombă 

4210 LET BF=20: LET BX=NT (RND*19y LET BY=NT 
(RND*32% PRINT AT BXBY; INK 4FE 





4215 PRINT AT 2115; BOMB FUSE:) 
4220 RETURN 
Liniile 5000-5040; Această  subrutină este 
chemată dacă raza laser atinge o bombă. Linia 5020 
afișează peste (OVER) bombă. Cind folosești PRINT 
OVER se șterg pixel identici cu cei ai nouku obiect 
afișat. Deci, dacă afișezi același obiect de două ori 
cu OVER acesta se șterge complet, chiar asta face 
inia 5020 - șterge bomba pe care ai atins-o cu raza 
laser. Următoarele ini cresc și afișează sconu 
5000 REM Bombă lovită de laser 
5010 FOR N=1 TO 20; BEEP .001,60 NEXT N 
5020 PRINT AT BXBY; OVER t.E: FOR N=10 TO 30 
STEP 5: BEEP O01N BEEP .O01N+t NEXT N 
5030 LET SC=SC+BF*10: PRINT AT 2112- EN (STR$ 
SCSCGT AB 31 
5040 LET BF=100: RETURN 
Linile 5100-5150 Cam același lucru pentru nava 
extraterestră, dar în loc de a folosi OVER este 
simulată o explozie iar coordonatele navei sint 
aduse la 00. 
5100 REM Extraterestru lovit de laser 
5110 FOR N=1 TO 10: OVER t PRNT AT AXAY; EAT 
AXAY; 'G': BEEP .005,10-N: NEXT N: OVER O 
5120 PRNT AT AXAY; OVER TE 
5130 LET AX=0: LET AY=0 LET AVX=t LET AVY=0 
5140 LET SC=SC+50 PRINT AT 21,%P-LEN 


SCYSC 
5150 RETURN 
Linie 6000-6050: Bomba are o explozie specială, 
de care se ocupă această subrutină. 


AT (fe 
PS 00% OCT 2N-2+N 


6030 PRINT AT SXSY, 
6040 FOR N=0 TO 2t 
BEEP .01,-20: NEXT N NEXT M 

6050 GO TO 7000 

Liniile 6100-6140 Această rutnă este chemată 
cind nava ta se cu vreun obiect și este 
distrusă. Explozia este simulată la inia 6130, apoi un 
efect sonor îți anunță neplăcuta veste. 

6100 REM Navă distrusă 

6110 PRINT AT AXAY; (t*sp)'AT pe Se 

6120 FOR N=1 TO 30: BEEP .01-20: Ei GOI 
NEXT N 

6130 PRINT AT SXSY; GAT 10,12; 'GOBBLEDI" 

6140 FOR N=25 TO O STEP -t BEEP „005 BEEP 
.005N-t BEEP .005N+t NEXT N 

Linile 7000-70 Aici jocul a apns la sfirșit La 
7010 PRINT 10 este o cale comodă de a afișa pe 
cele două ini, 22 și 23, din partea inferioară a 
ecramuu. Linia 7020 verifică dacă ai realizat un 
“high-score” și dacă da modifică variabia HS în mod 
corespunzător. Apoi sint șterse de pe ecran toate 
obiectele existente și programul se reintoarce la inia 
de plecare pentru a inițializare. 

7000 REM Game Over 

7010 PRINT 40; (î1*sp)GAME OVER: PAUSE 150 

7020 F SCHS THEN LET HS=SC LET S$=STR$ SC 
FOR N=1 TO LEN S$: LET H$IN+6-LEN S$)S$(N> NEXT 
N 

7050 PRINT AT 2115; (2*sp)HGHt 'H$ 

7100 PRINT AT SXSY;'(?*sp)'AT AXAY; (t*sp)'AT 
BXBY; (t'sp)” 


trad. ANDREI STOICA 





bucia FORNEXT din inile 30.50. 
Variabila “suma” este destinată 
controluăi, pentru a fi sigur că nu 
s-a strecurat vreo - 


6000 REM Explozia bombei 7410 GO TO 2000 PR 
6010 PRINT AT 10,14: BOOM'AT BXBY:G. 
6020 FOR M=1 TO 8: FOR N-0 TO 7: 2N BEEP 
01-20 NEXT N NEXT M 
40 READ a LEJ 
Spectrum suma=suma+a : POKE na 
50 NEXT n 60 F suma — 

4531 THEN PRINT "Greseala ! 

INPUT AT Verifica datele 7 tastare, 
70 CLS 


80 PRNT AT 30; Scrie ceva 
Di INPUT  4USR adresa; 
2 RE ATA St/205, 120, 50.9) 


î Ap 


10 coboară RAMTOP-ul 
a introduce codu mașină * 
adresa hu, lucru făcut de 


De mic mi-am dorit o aseme- 


Lei 
cele două îni de jos ale ecranului 


A anl 


Pale 
peste 


Bineînțeles 
“adresa” la care este e 
codui mașină poate fi schimbată 


Dacă totu este în regulă, să 
facem o mică incercare | Să 
poziționâm cursorul la 
coordonatele dorite, să scriem în 
lia 80 o instrucțane PRINT AT și 
imediat INPUT 4USR adresa; Veţi 
; vedea cursoru apărind undeva 
sus pe ecran în loc să apară pe 
inia 21. De fapt asta şi doream 





Pagina pentru incepatori P 


Commodore 
FLOPPY DISK 


Pentru a stoca pe disc, Commodore 
utilizează o unitate de tipul 1541 sau mai nou 
1541 B. 

Acest periferic conţine o memorie ROM 
(Read Only Memory) de 16 Kb și o memorie 
RAM (Random Acces Memory) de 2 Kb. 

In memoria ROM este înscris sistemul de 
operare, denumit DOS care prevede execuția 
operaţiilor ce vin de la calculator spre acest 
periferic. 

Memoria RAM servește de 'buffer' (memo- 
rie tampon) pentru datele ce sosesc de la 
calculator pentru scrierea pe disc. 

Pe disc putem defini asa numitele sectoare; 
acestea nu sînt altceva decit mici parți de 
disc pe care se scrie sau de pe care se 
citește printr-o singură operație. Intr-un 
sector, sau bloc, sint conținute 256 de 
caractere (256 bytes). Blocurile sint așezate 
concentric, formind pistele (trak) numerotate 
de al î la 3b. 

Pista 18 este o pistă specială în care se 
înscrie directory-ul discului (catalogul discului) 

Pistele sînt dispuse în felul următor: 


PISTA SECTOARE NR. SECTOR 
1 — 17 21 O — 20 
18 — 24 19 O - 18 
25 — 30 18 O — 17 
31 — 35 17 O — 16 


Să facem un calcul: 

21*17 + 7*19 + 6"18 + 5"17 = 683 blocuri, 
dar 19 blocuri de pe pista 18 sint rezervate 
sistemului, deci: 

683 — 19 = 664 blocuri (sectoare) 

Făcînd un calcul simplu, un disc are: 

664"256 = 169984 bytes 


Spectrum 
HEADER SINCLAIR 


in cazul calculatoarelor Sinclair Spectrum 
sau compatibile cel mai utilizat mod de sto-— 
care a informaţiei este pe banda magnetică. 
Folosind comenzile din Basic "LOAD" și 
"SAVE” putem încărca sau salva îN și din 
memorie programele sub o formă standard: 
un header şi un bloc de date. Blocul de date 
conţine informația utilă iar header-ul conține 
informaţii despre blocul de date. 

Astfel, header-ul conține 19 octeți de date 
din care utilizatorul nu are acces decît la 17. 
Primul octet este generat automat de rutina 
de salvare şi este 'O0OH' pentru header și 
'FFH' pentru bloc de date. Ultimul octet re- 
prezintă paritatea și permite detectarea 
erorilor de încărcare de pe casetă și este și 
el generat automat de rutina de salvare din 
ROM. 

Ceilalţi 17 
semnificații: 

1, tipul blocului de date / OOH-program 
Basic , OOi-tablou numeric, O2H-tablou 
tip şir, O3H-cod mașină. 

2-11. numele blocului de date. 

12-13. lungimea blocului de date. 

14-15. bloc de tip OOH-octeţii reprezintă 
numărul liniei Basic pentru autostart. 
bloc de tip O1H, O2H-octetul PP este 
folosit și reprezintă numele tabloului 
respectiv. 
bloc de tip O3H-adresa de al care 
se încarcă blocul de date. 

16-17. bloc de tip OOH-lungimea efectivă a 
zonei de program Basic. 
bloc de tip O1H, 02Hm O3H-nefolosiţi. 

continuare în pagina 28. 


octeți au următoarele 





HELLO. 


. again 


The AP, mă 


LOOK (pină cind creatura apare) 
/TALK (4*y/LOOK UNDER BED/GET 
MUG / E / BRAEK MRROR / GET 





SCAL PEL /OPEN/SAN ALOOK WALL 
/TALK/(pină la: Your dreams...)/ 
LISTEN/E/OPEN/T AL K(3*)/ATTAC 
COUNSELLOR / TEAR PAD / GET 
ROPE /LISTEN/DROP MUG/ LOOK 
(pină cind se umple)/E/S/S/OPEN 
/ ATTACK COUNSELLOR / GET 
WATER/LOOK(4*)/ E/S/OPEN/GET 
BOTTLE / E / EAT POWDER /E/ 


STAIR/PULL  TRIGER/OPEN/DRINK 
(pină cindtskin )/S/ALOOK 


BASE/GET GLUE / E / TALK / 






LOG/GO HOLE / LOOK / GET 
SHOVEL / GET BRONZE KEY / GET 
OUT / CLMB LOG /W /W/W/ 
SHAF ALA/UN_OCK/DROP  BRONZE 
KEY /N/N/ DROP SHOVEL/S /E/ 
CLIMB / CLIMB / N / OPEN / LOOK 
NATIVE (pină cind se deschide 
umbrela) / GET UMBRELA / N/CUT 
STRIPES / N / MRROR/GO CRACK/ 
LOOK / DROP MRROR / DROP 
SCALPEL / EAT POWDER / OPEN 
UMBRELA / LOOK(5%) / LOOK 
DECK/GET PRESERVER/S/LOOK(4”*) 
7IUMP / LOOK DOWN / GET 
CROWBAR/DIVE/DROP  PRESERVER 
/DROP UMBRELLA/GET SCALPEL / 
EAT POWDER / WATER PLANT / 
OPEN(2*) / EAT POWDER / CLMB / 
OPEN / LOOK / GET SHOVEL / DIG 


PLANT/GET SHRUB/DROP 

/ S /W / OPEN / LOOK UP / 
LADER/LOOK/56621/OPEN/L_ 

/ UFT COVER / LOOK / E / CLIMB 
/OPEN/N/E/CLIMB(2*)/N/OPEN/N/ 
N/GO CRACK/LOOK/EAT POWDER 


OPEN/KILL LIZAED/LOOK/ CLIMB 
/HOLD BREATH/CLIMB/W/MRROR 
/USTEN2*)/GET  STEAK/E/CLIMB 
/ DROP MRROR / DROP SCALPEL. / 
EAT POWDER / EAT POWDER/ 
THROW STEAK / E / OPEN / GET 
SCREWDRIVER / WAKE UP / EAT 
POWDER / CLMB / OPEN /S/E/ 
CLIMB(2*)/N/OPEN/N/N/GO CRACK 
/ LOOK / GET UMBRELLA / EAT 
POWDER / OPEN UMBRELLA / 
LOOK(5*) / OPEN / LOOK / LOOK 
PANTINGS / REMOVE SCREWS 
/GET SMALL KEY/WAKE UP/DROP 
SCREWDRIVER/DROP  UMBRELLA/ 
GET SHRUB/EAT POWDER/CLIMB/ 
OPEN / S / E / CLIMB(2*)/N/OPEN/ 
UNI OOK/OPEN/GET WRENCH/ W / 
S/OPEN/S/CLIMB/W/W/W/OPEN/ 

CLIMB/566221/O0PEN/LOOK/ TURN 
BOLT/GET GOLD KEY/WAKE IP 
/DROP BOT TLE/N/OPEN/ UNLOCK 


/OPENAOOK/TALK/TALK. we 


The Living Daytight 
POKE 4390,238: SYS 4352 


Satan la primul nivel tastaţi 
0102 


Bomb jack 2 
POKE 7053,200: SYS 39712 


1942 
POKE 3198234 
POKE 3199,234 
SYS 2640 


RobOCOp 
POKE 4440996 vieti infinite 


POKE 43365,96 etapa î& 
POKE 43163,96 etapa BA 
SYS 32768 fiecare etapa 


Game Over 
POKE 15244,234: 
POKE 15245,234: 
SYS 2304 vieti mfmite 





1942 ;/! 1650702, 201 
14 4150777, 201 INDESTRUC 


2304, X  vEN 
2417,0 VENE 
52472,0  -/p- 
46650,0  -7/- 
48415, 0 FARA INAMO 
ZYTHUM 51269, 62 BOMBE WF. 
51270,5  -//- 
54783,0 VENW. 
52508, X NR. BOMBE 
52503,X  NR.UETI 
FIGHTING WARRIOR 
60707, 3 







37334, 201 FARA TURB 
36925, 201 MENU 


DAN DARE 
47722, 201 ENERG. WF. 
43526,0 TME, 
43529,0 TME. 
4774, 151 _vEn E. 
477%2,3 VENE. 
REVOLUTION 
35650, 152 VEI WE. 
35651, 26 VENE. 


Mercenary (map I) Spectrum/Commodore 


DUNGEON STEP >>> EI 


MAIN BUILDING DUNGEON FLOOR 








3 REM CC XC CA AC ACE AC X DAC AC DC DACA XC 

Commodore |:: i ia 
* REM ADAFTED EY xx V,S, SOFT 1990 xx 

6 REM XX XX 

G4+ 64 7 REM XX CRC, tea 

8 REM AC AC ACR AC AC CA DAC AC AC IC DACA 28 20C AC IC CA 


dat 10 PRINT** 

aia ari unu al revistei | 100 FOKESIZ01v12:FRINT"":POKE53280,9! 
rien Ali E dece dag 101 POKE 53281,0:FRINT CHR$(152) 

iană un scurt program prin| 102 FOKE 53272023 | 
care se pot! cipla, prin| 110 SI=51272:FOKEZA+GI,15:POKEST,207: 
cablu, două sau mai multe | Îl! FOKEI+SI>34:POKES+SI»10 
C64. (legatura se poate face şi | 120 FOR H=1033101044:READ A:POKE HsAiNEXT_H 
prin Inie telefonică). 125; FOR H=1273 TO1283:READ A?POKE HoAtNEXT H 
Pe linga soft dăm și modul de | 130 OFEN2,2r0"CHR$(6)+CHR$CO) 
conectare a acestor calcu- | 140 T=1104:T0=0:R=1344:RO=0:R1=0 





latoare. 150 REM MAIN 
Autor: VIOREL STAN 160 FOKE T+TO+60:POKE T+T032:GET T$ 
170 IF T$=""THEN G0T0270 
iasi fe acul 180 IF T$£:CHR$(20) THEN GOTO 210 
! a 190 IF T0:0 THEN TO=T0-1 
= 200 POKE T+T0,32:G0T0270 
Pee MA 210 IF T$:i>CHR$(13) THEN GOTO 240 
comunicatie 220 GOSUE 700 
ice 230 G0T0270 
ps arce 240 IF T+TOk=R-80 THEN GOTO 260 


250 POKE T+TOvASC(T$) :TO=T0+1.:GOT0 270 
260 POKE53280,1:F0R H=0 TD 1S:NEXT H 
a 261 POKE532809 
test 270 GOSUE 800 
M 280 GOTO 150 
700 REM TRANSMIT 
710 PRINTE2rCHRS (62); :PRINTE2,CHR$(32) i 
720 FOR K=T TO T+TO-1 
730 PRINT4ZrCHR$(PEEK(K)) i :POKE Kr82 
740 GOSUE 800 
750 NEXT K 
760 PRINT&2"CHR$(13) 3 :T0=0 
770 RETURN 
800 REM RECEIVE 
810 POKE R+RO”G0:POKE R+RO»92:GETE2rRS 
820 IF R&=""THEN GOTO 980 
830 IF R$E:CHRS(13) THEN GOTO 900 
040 FOKE 54276» 0:POKE 5427633 
850 TF R1:=40 OR R1=0 THEN GOTO 870 
860 PDKE R+ROs32:RI=RI+1.2RO=R0+1 2 GOTOB50 
870 RI=0:IF R+R0=2024 THEN RO=0 
880 FOR H=R+RO TO R+RO+B9:FOKE H»32:NEXT H 
890 60T0930 
900 FOKE R+ROrASC (RS) tRO=RO+1ERI=RI+I 
910 IF R1=40 THEN RI=:0 
920 IF R+R0=2024 THEN RO=0 
930 RETURN 
950 DATA42»32,84,82761;,705835 7717390432942 
960 DATA 32 9829 69967969 v 739 B6r 69 329,42 
970 END 














+ 999% 


READY e 





Sziţi MORSE? 
NU? 
DE CE?... 


in fine n-are import 


anță ... Aveţi acum posi- 


bilitatea să invăţaţi, simplu şi comod, limbajul 
universa! MORSE. Tot ce vă trebuie este un HC, 
CIP sau Spectrum. 

Este captivant să umbii pe scala radioului şi 
să interceptezi transmisii de date, dialoguri și 
chiar". .., dar pînă acolo este zimp îndelungar 
şi trebuie o bogată experiență. 

Puteţi să o obţineţi exersindu-vă cu propriul 
calculator. Mult succes, fani !!! 





1 REM 133 rIrIrrrIrrIrrrrrrrrrt 
2 REM t * 
3 REM + MORSE  vea.5 + 
4 REM + 3 
5 REM + 1989 bu S5.U. socotit € 
6 REM t 3 
? REM + CRC * 
8 REM 75111rrrazrIrrr+tIirIrtrră 
9 CLS : PRINT AT 109,1; "MORSE 
V.05 1989 by V.s5. SOFT" 
10 POKE 23658.255 
12 LET e+.07 
40 G0 SUB geee 
100 PAPER 1; INK 7. BORDER 1; C 
LS 
110 PRINT AT 1,10." OPTIUNI 
PER 
120 PRINT 
140 PRINT "1 TRANSMITE HESAJUL" 
PRINT 
160 PRINT “2 CREAT HESAu ". FRI 
NT 
170 PRINT "3 TESTE". PRINT 
180 PRINT "4 VITEZA” PRINT 


210 IF INKEY$="1" THEN GO TC 2 


ees 


IF INKEY$="2" THEN G0 To 2 


IF INKEY$="3" THEN G0 T0 5 


IF INKEY$="4" THEN 60 TO 6 


IF INKEY$c>"'4" THEN G0 TO 


LET x$=v$: LET v$=4$+v$+h$ 

FOR x=1 TO LEN v$-32 

1920 IF o0o=0 THEN PRINT AT 21,8; 

v$(x TO x+31) 

1025 LET î=CODE v$(x+31) 

19038 FOR yzi1 TO 5 
19040 IF t;64 THEN 

v$(x+31))-64,y) .,25 
1042 IF t:58 AND t>47 THEN BEEP 
CICODE (v$(x+31))-21,y),25 

1245 NEXT y 

1046 FOR Kk=0 TO Lt:16 

1047 NEXT Kk 

1050 NEXT x 

1999 G0 TO 2ii1e 

2000 LET o=1 

2005 LET v$=f$ 

2210 GO T0 10098 

2020 G0 TO 12909 

2030 CLS PRINT AT 2.7;"CRERT U 

N MESAu" 

2040 FRINT PRINT "SE INTRODUCE 
MESRJUL DUPA CPRE SE TRSTERARZA 


BEEP c(CODE | 


zENTER=" 
2852 INFUT v$ 
2060 CLS PRINT "APASA 0 TASTA 


PENTRU START" 

2070 PRUSE e 

2080 G0 TO 2100 

2090 LET o=1 

2100 GO TO 18ee 

2110 LET o0=0 

2140 LET f$=x$ 

2150 GO T0 1009 

5aee CLS PRINT AT 1,10; "TESTE" 
5060 INPUT "VREI SA SE TRANSHITA 
"LITERE (1) SAU CIFRE (2) ?";a 
$ 

5090 IF aș="1" THEN LET b=i 
5100 IF aş='a2" THEN LET bza 
5105 IF CODE a3a$:49 OR CODE aş$>50 
THEN  G0 TO se6e 

5115 FRUSE S5e 

51ze FRINT "APARARE CARACTERUL URM 
AT IMEDIAT DE SUNETUL CORESPUNZ 
ATOR'. PRUSE 100 

5121 PRINT 

5128 LET N=0 

5138 FOR x=1 TO see 





PRUSE L*65: LET N=0 

5148 IF b=i THEN LET v=INT (RND 7035 IF e=8 THEN LET €e=.Q03. 
+26) +1 URN 

5150 IF b=2 THEN LET v=(INT (RN 7048 IF e=9 THEN LET €e=.Q02: RET 
D109) +1) +26 URN 

5169 IF b=1 THEN PRINT CHR$ (v+ 7050 IF e<:S3 THEN G0 TO 6008 

64); 9a0a RESTORE DIM ct36.5) 

5170 IF b=2 THEN PRINT CHR$ lv+ 9005 LET s=e: LET l=et3, LET 0=0 

21); LET x$a2"": LET f$="": LET aq$=" 

5198 FOR y=1 T0 5 Ie 

5200 BEEP civ,y),25 "LET h$=". 

Sz1ia NEXT vy 3218 FOR x=1 T0 36 

5211 LET N=N-+1 939a280 FOR y=1 T0 5 

5215 FOR a=0 TO st1$5 9238 READ cix.y) 

5217 NEXT q 9Q4a NEXT vu 

5230 NEXxKT x 9258 NEXT x 

Sz4a PAUSE e: G0 T0 120 3a62a DATA :.1.20.8,0,L,s,s3.s.8,l, 
562209 CLS PRINT AT 1,6; "'MODIFIC 3,L1,5,9,L1,5,.s,20,9,s,2,0,09,0a,s,s, 
RREAR VITEZEI": L,s.9,L,L,5,0,0,s,s,s,s.8,s,s,8, 
6010 PRINT -SE INTRODUCE CIFRA 9.0,s,L,L.L.9,L,s,L,0.0.s,1,s,s. 
DIN DREPTUL VITEZEI DORITE" 8,L1.L1,.29.2.9,1,s.9.2.8,L,L,1.2,e, 
6013 PRINT s,L.L,s.8,L,t,3,L,0,s,L,s,e,8,s, 
6015 PRINT ” 1 LITERE= 60-CIFRE= 5,5.98,0.,L1.20,0.2,0,s,s,L,0,8,s,s, 

45" s,L1,9,s5,L,L,0,9,L,s,s.t,e,t.s,t, 
6017 PRINT PRINT ” 2 LITEREz= 7? MA e E E i 

2-CIFRE=S5e2" 9978 DATA NP PTA PUI ti BP SA BI N E e 
6019 PRINT : PRINT " 3 LITERE= 7? So Loto Le SS loSeSoSoSoleSe5, 

5-CIFRE=53" 5,5,s,l,s,s,s,s,tut,s,s,s,t,tet, 
6021 PRINT PRINT " 4 LITERE= 8 s,s,L,tL,t,t,s 


Q-CIFRE=60" 


9995 RETURN 


6023 PRINT . PRINT “ S LITERE= 9 9999 SAVE "MORSE VG.85" LINE e 
O-CIFRE=70" 

5025 PRINT . PRINT " 6 LITEREz=10 Spectrum 

feb detali PRINT * ? LITEREzLI LORD OF RING DN = 

a -CIFRE=90" RED MOON PERI 1 - ACARAROpO A 
6029 PRINT PRINT " 8 LITEREz13 ELITE WAX'WORKS 
O-CIFRE=100" 

6031 PRINT : PRINT " $ LITERE=14 FALL GUY NOMAD 
G-CIFRE=120" ON THE RUN TOP GUN 
6035 INPUT e COSMIC WAR  BARBARIAN 
6237 GO SUB 7000 MAGIC CASTLE SCUBA DIVE 
5040 PRINT "ASTEPTATI !". GO SUB 

TIT.) | TANX ZOMBIE 

6250 GO To 180 AMAZON SPELLBOUND 
7000 IF ei THEN LET €e=.1:. RETU DECATHLON AUSTERLITZ 
RN E STREAKER SPY HUNTER 
Dear a a e e II0UNDARCEI DRAGONDBANE 
7010 IF e=3 THEN LET €=.08: RET ZOIDS CYBERUN 

URN SHOW JUMP RUNESTONE 
7215 1] e=4 THEN LET €e=.Q07: RET COMMANDO MOVIE 

URN 3 

7020 IF e=S THEN LET e=.06. RET DAMBUSTER TAU CETI 

RN HIGHWAY ID 

7025 IF e=6 THEN LET €e=.05: RET BRIDGE FAIRLIGHT 
URN 


CLUBUL ROMAN DE CALCULATOARE 


?230 IF e=? THEN CP 37-131 BUCURESTI 


URN 


LET €e=.0Q4: 


Laborator 5 


hobBI! 


Contnuâm prezentarea schemei calculatorului 
Spectrum Dacă in primu numâr am publicat schema 32v 


propriu-zisă, astăzi vă supunem atenţiei conectorul 
codorul de culoare, susa și mterfața 








Wii 2 





tă 









1.M4884 





533yugusagazaazaiazea la » 


i2v 


2 îi! Aaa CAES 


Fe A, 
i Rt ai sta CA 


3 
ii intertata cas/dithucor 





hobEiT | 


9-232 


Murcea Gavât 


Wmterconectarea la distantă a sistemelor de 

cakul se face prin transrmsia serială a da-— 
teior pe linule re comunicație. Biti care 
formează caracterul (octetul) sint transmiși 
consecutiv pe o singură linie. Peniru 
adaptarea semnalelor transmise ia cerintele 
standardizais ale liruior re comunicatie se 
folosesc mnterfete seriale. Printre cele mai 
utiizate se numără și intertata tip RS-232/V 
24care asigură mvele de tensiune de +/-t2YV 
pe linie. 


LISTA PIESELOR COMPONENIE 
C1: 100 „„F/2bV D: 1IN4007 
C2: 225 44F/25V iz: PiL.i2 
C3: 100 nf CH: ROB1488 

Cl2: ROB1489 


ualcuatorul C 54/1298 este prevăzut si cu 
o interfată--sofr RS-232 accesibilă la User 
Port prr intermediul circuitului CIA2 (6526), la 
nivei logic TIL. 

Ganectarea la linie se face printr-o mufă 
tip Cannor--25 piru. Pentru realizarea comu-- 
nicatiei prin canalul serial se folosesc co-— 
menziie: OPENH, GETE, INPUT. PRINT, 
CMD,  CLOSE&. Deschiderea canalului de 
comunicație se face cu: 

OPEN 1, 2, O. CHR$(39)+CHR$(96) 
(500 baud, ? biți, 1 bit stop, fară semnale de 
control, full duplex, paritate pară). 


SERIAL OUT 
C3 








SEI CA ep! 


e să oii 





Cum CIUP TATA 
PN TRU JOYSTICK 


KEMPSTOIN JOY STICK —————— 


Tips & lrcks 
continuare paa. 20 


Pentru a obţine diverse efecte mai deosebite la 
incarcare in cadrul celor 10 ucteu care constitue 
numele programuki putem introduce și dverse 
caractere de control cu reducerea corespuzâtoare 
a numărului de caractere ce alcătuiesc efectiv 
numele program. Acest fucru ft putem realiza scriind O 

10 SAVE "______ MUME” 


dorite, cu ajutonu mstrucțiună POKE. Datre aceste 
caractere putem exemplifica: 

- INK / 10H / 

- PAPER / Hi / 

Ele trebue urmate re inca un octet care constitue 
codul culori. Exemplu : 10H, 06H obținem o tipărire a 
numelei programukha cu INK= 6. 

- FLASH / 12H / 

- BRIGHT / 1%3H/ 

- INVERSE / t4H 7 
urmate de OtH pentru a fi active. Deasernenea mai 
putem folosi 
CARSOR LEFT / 08H / 
CURSOR RIGHT / 09H / 
CURSOR DOWN / OAH / 
CURSOR UP / OBH / 





Spectrum 
Programe scurte de mare efect 


Border în două culori 


Dim partea prietenului nostru 
FLAVIUS LUPU 


hobBIT. 


Spectrum 
Programe care inlocuiesc 
LOADER-ul Basic in jocuri: 


GHOSTN & GOBLINS 
-mfinite time and hves- 
5 CLEAR 59999: RESTORE 


USR 65477 
65 DATA 255,6, 126, 238 


E: 


FISI 2 
-nfinite ives- 


5 CLEAR 65535: FOR F = 65200 TO 65237 
15 READ A: POKE F, A: NEXT F 
50 DATA 231, 33, 175, 253, 17 


70 DATA 33, 2 
75 DATA 253, 1, 10, 0, 237 

80 DATA 176, 195, 232, 252, 0 
85 DATA 62, 24, 50, 182, 105 
90 DATA 195, 14, 241 

100 RANDOMIZE USR 65200 


TeoSsoft 


Din preocuparile hobBIT-ului 
(Moimoveri ; 28. 12) 





hobBIT. pralea 


Asa cum spuneam 
anunturile sint: 
GRATUITE. 





















CUMPAR soft VC 20 
tel: 601980 


VIND VC 20, casetofon 
extensie memorie, 














5 Xeu documentaţie. tet 795742 
a ret 917/43176 dupa h:20 
754083/1H8 CUMPAR unitate 
Doresc contact CU |inmmanunannnnannanannanananana darupip d 29 5 CUMPAR imprimantă 
noscători Spectrum +. format A4 (Specrum) 
(-cu drive) VIND apti Basic DOS | —————————— | tat 784204 
c Sinclair in- , : 
tet 605471 (h: 2t+-22) alertele e CUMPAR joystick, ca- SESCEI 
tet setoton, floppy 1541. | CUMPAR ksting ROM 
tert rr rrper rr tri os /ae LPrint W, mută Centro- 
sai 90 NI - - nix, colaborez sau 
VIND Spectrum +, ca- ||DOrESC asistenţă în re || cumpăr interfață pt. 
sete şi documentaţie ||ălZărea unu calcula- | | drive floppy 
tor Cobra. tel: 373547 


completă BASIC, 
PASCAL. (35000 lei) 
tet 971/28041 


tet 143270 





CUMPAR imprimantă 


matricială tip 
ROBOTRON 53163 / K 
6314, unitate disc 5” 
(Commodore 64) 

tei: 807059 - Răzvan 


GOLD 


CUMPAR soft 
STAR FC 200-MSX 
tel: 860321 dupa h: 19 


Caut prorame şi uti- 
itare pentru C116 


tet 453086 dupa h 16 VIND monitoare mono 


crom (verde) pe talpă 
Sa a CNE RIES EIN, Aa ei bla 

SCHIMB înscriere tele- | tet 307059 - Răzvan 
vizor color anul 10090 | __——————— 











cu calculator HC-85; VIND ROM 2K. tet 926/13435 CUMPAR joystick pr 
Cobra; TIM-S sau Commodore. 
3 tet 892047 
sale je hein ZX sisu ainu disuasiune CUMPAR joysUuck. tet 113151 
1et 466364 îi VIND PC-AT 286/4124, | te: 890672 | CUMPAR joystick Bt 
% 1MB RAM, 40MB MDD,2 Commodore 
See area eee eee II > a 0 VII CONOR ie CUMPAR casetofon PL. | ret 180024 
3 Mouse (3 butoane) 5 Commodore. aa 
AIE 45070 îi | tet 279143 CUMPAR casetofon pt. 
au a AAC a E atata GEO ETED ERSTE aaa 
CUMPAR joystick ȘI | tek: 102524 
= ca ae floppy Commodore. ae DR e test e a aa 
a aaa initierea tel: 847288 CUMPAR CIA la pret 
SI PRIN 20 2 ducat RI 039 NOE Tea SICA 2 95 acceptabi 
Clubul Român de CUMPAR, joystick (cu | et 150461 
tel. 476218 CUMPAR  Zork  HV, 


Calculatoare 
caută urgent codurile 


e acc 


es in baze pentru 


GUNSHIP 





CUMPAR tastatură HC 
şi tastatură cu car- 
casă Cobra. 

tel: 925/43694 dupa h:21 





CUMPAR casetofon m- 


| registrare, cu contor. 


tet: 2361.38 dupa n: 17? 


Ultima !-V, They stoled 
one milion. 
-la club: pt. Viorel 
CUMPAR joystick. 

tet: 164689 dupath: 8 


CUMPAR imprimantă 


——— pentru C64. 
casuţa posială 37-13] CUMPAR joystick tet: 474773 | 
Bucuresti î sapa Stimati cititori, revista 











CUMPAR joystick 
tel: 865406 


noastra publica ammturie 
ordinea  sosiri acestora. la 
redactie, reproduse identic. 

Va rugam totusi sa le formulat 
piei mod acceptabil pentru 
to 





contiware din pag 5 
Sa stam putin de 
vorba ... 

Dacă aveţi idei sau sugesti, 
posibilități de a lua legătura cu 
cercuri sau cluburi de informatică, 
cu difuzori de presă, nu întirziați 
să ne scrieţi 








să-si ridice 


Din numărul Viitor, încă 5 par- 


ticipanţi la concurs vor primi 
cite o surpriză. 

Se iau în considerare toate ta- 
loanele numărului respectiv, pina 
în momentul cind  următoarul 
număr este trimis la tipografie. 





TEO multumesc pentru 
ajutorul dat !? ! 
SPODCDCDODOIOD 


Reamintim că puteţi cita 
100 de programe trimiţind 3 
ia 


Deasemenea, puteţi rezerva 
re teriprt număr cu ajutorul 
de rezervare. 


BOOOGOOOOOE 
& 


> To 


:DA, doresc rezervarea urmă- 


:torului număr al revistei 

: LIVRAREA PLATA 
 C LACLUB CO PERSONAL 
CI PRINPOSTA+ CI PRIN MANDAT 
SE ae n ea eat 
CDERA a a i 


- «Adaugati, ua rugam, 4.80 lei pentru posta! 










Ciştigătorui celor o sută de 
PrOG aa: prin. Aaaa: ii 


dări: DGorbteița. ri  aereptum 
PREMIUL 3 


NUME 





BURSA _ [PE 
270 [aid 





(E 
ID PS/2 
Mociel 25-C0LOR $.1250 
-/1- 30-286 2O0MB $.1795 
30M8 $.1925 
-41- 80-45 $.5300 
Leptop SLT 286 20/40 
$.3057/4175 
FLOPPY DRIVES 
35%. 144MB $.63 
3.25” 1.2MB $.71 
External 127MB $+18 
HARD DISK 
3.5” A4MB-28rr5 $285 
35 111MG-1515 $.553 
300Mb-15ms  $1310 
MONITOR 


12” Piuips mono. $.50 


14” mono. $.98 
14” color $.220 
VGA $.345 
EGA monitor CST O $.280 
PRINTER 

IBM LX-42 $..330 
Fx-t050 3.450 


NEC KC 850flaser) $.3150 


COMMODORE 64 / JOYSTICK 
$.139.95 
COMMODORE 64 / DRIVE / JOY 
$.249 
„op 


9900990408 
TALON CONCURS 
MA SI Sar ar SIeSăe Sâ Mar Mr Mie 





NE RN ORI AR E TRI A AL DR, e e DI m 0 9 a 
800 d vane [e a. 0-0 
DR a e RE a IN a bn Nu IE A Sc 


casetă 


bobi 


CUMMODORE. 1084 color 
$.279 
COMMODORE 15414 dnve 


COMMODORE 128 D / rotor 
printer / 12” Morutor / NOE 
8.379 
AMIGA 500 7 3.5” 
$.489 
AMIGA 2000 7 1M8B/ 3.5" 
$.12429 
IBM XT / S40K / 10Mz 
$.29393 
WM AT / 80286 / 10M2 Ap oa 
1.299,21 


GEOS Șt  IIARMONY $. 
STRIKE ACES $.19 Fiad $25 
BRIDGE $.21 PICTIONARY $.19 
SIM CITY $.19 DARK SIDE $.21 
RUBOCUP $.23 AL GEBLASI $.29 
BODY TRANSPARENT $.19 
BATMAN LET MOVIE $.19 
WORLD ATTACK $.19 
EMPME $26 F1G $.23 
MON LORD $.26 LOOPZ $.call 
STARFLIGHY $.26 RISK $.%9 
STAR TREK: REEL S.23 
HU LSTAR $.26  OVENRUN $.23 
15 Ș.A F19 $.29 
GUNSHIP $.25 PIRATES $.29 
RED STORM RISING $.29 
SIENI SERVICE şt 
FLMHTI SIMIAN -ATOR 2 $.32 
ANIMATION STATION $.49 





ie jeleleleleleteleel=] 
belele ele]: folia lee! 
Commodore !!! 

Revista noastra 
oferă tuturor po- 
sesortior de tC64 


programul: 
PIRAIES! 

PE DISC. 

Trimiteţi im disc pe adresa 


reciactiei imprewmă cu suma de 
25 bei + adresa competa 
ACUM Lt 


